\begin{verbatim}
> PT := StripEncoding(Read("blackcat.txt"));
> FD := FrequencyDistribution(PT);
> CT := StripEncoding(Read("cipher01.txt"));
> for i in [1..11] do
>     Ci := Decimation(CT,i,11);
>     TranslationMatches(Ci,FD,0.50);
> end for;
[ 8 ]
[ 19 ]
[ 26 ]
[ 16 ]
[ 22 ]
[ 8 ]
[ 11 ]
[ 22 ]
[ 26 ]
[ 9 ]
[ 22 ]
\end{verbatim}

